From: Paul Eggert <eggert@twinsun.com>
Date: Tue, 27 Jul 1993 19:28:46 +0000 (+0000)
Subject: (vc-rcs-status): Removing any trailing "-".
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~94750
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=b6ff8721671867881b7a97450284aeb4583658d5;p=emacs.git

(vc-rcs-status): Removing any trailing "-".
---

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index c120b7cea3f..e9b28f99cdb 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -216,7 +216,7 @@ visiting FILE."
 			(narrow-to-region (match-beginning 1) (match-end 1))
 			(goto-char (point-min))
 			(while (re-search-forward lock-pattern nil t)
-			  (replace-match "-" t t))
+			  (replace-match (if (eobp) "" "-") t t))
 			(buffer-string)))
 		     (status
 		      (if (not (string-equal locks ""))